home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-10-26 | 641 b | 20 lines | [TEXT/ScoM] |
- Software Generated Tonalities
-
- Not only can symbol melody create zone length patterns, it can
- initiate tonality itself. In file STRUCT2, an invention for
- solo keyboard, a hopalong generator outputs a symbol pattern
- for each hand and an interval scheme for its tonality.
-
- (gen-hopalong-symbol xmel (a g) ymel (a g) 100 200 300 0.45 32 0)
-
- (setq mel1 (find-change xmel))
- (setq mel2 (find-change ymel))
-
- (gen-hopalong-vector tonx tony 100 200 300 0.45 7 0)
-
- (create-tonality scale1 (vector-to-list (vector-round 1 12 tonx)))
- ; -> (10 6 4 12 7 1 12)
- (create-tonality scale2 (vector-to-list (vector-round 1 12 tony)))
- ; ->(8 3 7 9 1 6 12)
-
-